home *** CD-ROM | disk | FTP | other *** search
/ American History: Interactive Maps & User's Guide / American History: Interactive Maps & User's Guide.iso / pc / Pref.dxr / 00010.ls < prev    next >
Encoding:
Text File  |  2000-01-25  |  987 b   |  29 lines
  1. on mouseDown
  2.   global gSystemVolumeLevel
  3.   set spriteNumber to the clickOn
  4.   set buttonPressed to the name of member the memberNum of sprite spriteNumber
  5.   set the memberNum of sprite spriteNumber to member (buttonPressed & "down")
  6.   updateStage()
  7.   repeat while the mouseDown = 1
  8.     if rollOver(spriteNumber) = 0 then
  9.       set the memberNum of sprite spriteNumber to member buttonPressed
  10.     else
  11.       set the memberNum of sprite spriteNumber to member (buttonPressed & "down")
  12.     end if
  13.     updateStage()
  14.   end repeat
  15.   set the memberNum of sprite spriteNumber to member buttonPressed
  16.   updateStage()
  17.   if rollOver(spriteNumber) = 1 then
  18.     case buttonPressed of
  19.       "exit":
  20.         set the soundLevel to integer(gSystemVolumeLevel / 36.42000000000000171)
  21.         go("Return")
  22.       "test":
  23.         set the soundLevel to integer(gSystemVolumeLevel / 36.42000000000000171)
  24.         set the volume of sound 2 to 255
  25.         puppetSound(2, "button sound")
  26.     end case
  27.   end if
  28. end
  29.